(blink-matching-open): Don't no-op when point is BEGV+1.

diff --git a/lisp/simple.el b/lisp/simple.el
index f06a279c9c2a4374ec954c5f7b948ca4852eb9a9..760d8cde744fd66e3fe58b5fd18e3c9104b06b25 100644 (file)
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4236,7 +4236,7 @@ If nil, search stops at the beginning of the accessible portion of the buffer."
 (defun blink-matching-open ()
   "Move cursor momentarily to the beginning of the sexp before point."
   (interactive)
-  (when (and (> (point) (1+ (point-min)))
+  (when (and (> (point) (point-min))
             blink-matching-paren
             ;; Verify an even number of quoting characters precede the close.
             (= 1 (logand 1 (- (point)